package com.neusoft.lohas.modules.upload;

import java.awt.image.BufferedImage;
import java.io.File;
import java.io.FileInputStream;
import java.io.IOException;
import java.io.PrintWriter;
import java.text.NumberFormat;
import java.text.SimpleDateFormat;
import java.util.Arrays;
import java.util.Date;
import java.util.HashMap;
import java.util.Iterator;
import java.util.List;
import java.util.Random;

import javax.imageio.ImageIO;
import javax.servlet.ServletException;
import javax.servlet.http.HttpServlet;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;

import org.apache.commons.fileupload.FileItem;
import org.apache.commons.fileupload.FileItemFactory;
import org.apache.commons.fileupload.disk.DiskFileItemFactory;
import org.apache.commons.fileupload.servlet.ServletFileUpload;
import org.json.simple.JSONObject;

import com.neusoft.lohas.common.config.Global;
import com.neusoft.lohas.common.utils.ImageHandleUtill;
import com.neusoft.lohas.common.utils.StringUtils;
import com.neusoft.lohas.modules.sys.entity.User;
import com.neusoft.lohas.modules.sys.utils.UserUtils;

public class UploadServlet extends HttpServlet{
	
	private static final long serialVersionUID = 1L;
	
	
	/**
	 * @see HttpServlet#doGet(HttpServletRequest request, HttpServletResponse response)
	 */
	protected void doGet(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException {
		doPost(request, response);
	}

	/**
	 * 文件上传请求处理
	 * @param request
	 * @param response
	 */
	protected void doPost(HttpServletRequest request, HttpServletResponse response) throws ServletException, IOException {
		PrintWriter out = null;
		try {
			/**
			 * KindEditor JSP
			 * 
			 * 本JSP程序是演示程序，建议不要直接在实际项目中使用。
			 * 如果您确定直接使用本程序，使用之前请仔细确认相关安全设置。
			 * 
			 */
			
			//文件保存目录路径
			String savePath = Global.getConfig("upload.path") + "";

			//文件保存目录URL
			String saveUrl  = "/";

			//定义允许上传的文件扩展名
			HashMap<String, String> extMap = new HashMap<String, String>();
			extMap.put("image", "gif,jpg,jpeg,png,bmp");
			extMap.put("flash", "swf,flv");
			extMap.put("media", "swf,flv,mp3,wav,wma,wmv,mid,avi,mpg,asf,rm,rmvb");
			extMap.put("file", "doc,docx,xls,xlsx,ppt,htm,html,txt,zip,rar,gz,bz2");

			//最大文件大小
			long maxSize = 20*1024*1024;

			response.setContentType("text/html; charset=UTF-8");
			out = response.getWriter();
			
			//获取社群个人文件目录
			String permissionsDir = "";
			User user = UserUtils.getUser();
			if (StringUtils.isNotBlank(user.getName())) {
				permissionsDir = String.valueOf(user.getId());
			}else {
				permissionsDir = "0";
			}
			
			if(!ServletFileUpload.isMultipartContent(request)){
				out.println(getError("请选择文件。"));
				return;
			}
			//检查目录
			File uploadDir = new File(savePath);
			if(!uploadDir.isDirectory()){
				out.println(getError("上传目录不存在。"));
				return;
			}
			//检查目录写权限
			if(!uploadDir.canWrite()){
				out.println(getError("上传目录没有写权限。"));
				return;
			}

			String dirName = request.getParameter("dir");
			if (dirName == null) {
				dirName = "image";
			}
			if(!extMap.containsKey(dirName)){
				out.println(getError("目录名不正确。"));
				return;
			}
			//创建文件夹
			savePath += permissionsDir + "/" + dirName + "/";
			saveUrl += permissionsDir + "/" + dirName + "/";
			File saveDirFile = new File(savePath);
			if (!saveDirFile.exists()) {
				saveDirFile.mkdirs();
			}
			SimpleDateFormat sdf = new SimpleDateFormat("yyyyMMdd");
			String ymd = sdf.format(new Date());
			savePath += ymd + "/";
			saveUrl += ymd + "/";
			File dirFile = new File(savePath);
			if (!dirFile.exists()) {
				dirFile.mkdirs();
			}

			FileItemFactory factory = new DiskFileItemFactory();
			ServletFileUpload upload = new ServletFileUpload(factory);
			upload.setHeaderEncoding("UTF-8");
			List items = upload.parseRequest(request);
			Iterator itr = items.iterator();
			while (itr.hasNext()) {
				FileItem item = (FileItem) itr.next();
				String fileName = item.getName();
				long fileSize = item.getSize();
				if (!item.isFormField()) {
					//检查文件大小
					if(item.getSize() > maxSize){
						out.println(getError("上传文件大小超过限制，最大上传大小为"+(maxSize/(1024*1024))+"M。"));
						return;
					}
					//检查扩展名
					String fileExt = fileName.substring(fileName.lastIndexOf(".") + 1).toLowerCase();
					if(!Arrays.<String>asList(extMap.get(dirName).split(",")).contains(fileExt)){
						out.println(getError("上传文件扩展名是不允许的扩展名。\n只允许" + extMap.get(dirName) + "格式。"));
						return;
					}

					SimpleDateFormat df = new SimpleDateFormat("yyyyMMddHHmmss");
					String newFileName = df.format(new Date()) + "_" + new Random().nextInt(1000) + "." + fileExt;
					File uploadedFile = null;
					try{
						uploadedFile = new File(savePath, newFileName);
						item.write(uploadedFile);
					}catch(Exception e){
						out.println(getError("上传文件失败。"));
						return;
					}
					String filePath = saveUrl + newFileName;
					//如果是上传图片
					if (dirName.equals("image")) {
						BufferedImage image =ImageIO.read(new FileInputStream(uploadedFile));   
						int targetWidth = 0;
						int targetHeight = 0;
						if (image != null) {
							int width = image.getWidth();
							int height = image.getHeight();
							if (width > 640) { //按比例压缩图片
								targetWidth = 640;
								// 创建一个数值格式化对象
								NumberFormat numberFormat = NumberFormat.getInstance();
								// 设置精确到小数点后2位
								numberFormat.setMaximumFractionDigits(2);
								double result = Double.valueOf(numberFormat.format((float)height/(float)width)) * targetWidth;
								targetHeight = Integer.parseInt(String.valueOf(Math.round(result)));
								BufferedImage bufferedImage = ImageHandleUtill
								.createLogoThumbnail(image, targetWidth, targetHeight);
						
								File sisFile = new File(savePath+"temp/", newFileName);
								if (!new File(savePath+"temp/").exists()) {
									new File(savePath+"temp/").mkdirs();
								}
								ImageIO.write(bufferedImage, "jpeg", sisFile);
								filePath = saveUrl+"temp/" + newFileName;
							}
						}
					}
					if(!dirName.equals("image")){
						filePath = Global.getWebUrlPath() + "/shops/download?filePath=" + filePath;
					}
					JSONObject obj = new JSONObject();
					obj.put("error", 0);
					obj.put("url", filePath);
					out.println(obj.toJSONString());
				}
			}
		} catch (Exception e) {
			out.println(getError("上传文件失败。"));
			return;
		}
		
	}
	
	private String getError(String message) {
		JSONObject obj = new JSONObject();
		obj.put("error", 1);
		obj.put("message", message);
		return obj.toJSONString();
	}
}
